object Form1: TForm1 Left = 154 Top = 125 Width = 596 Height = 420 Caption = 'A.M.P. Graphics Collection' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Icon.Data = {} Menu = MainMenu1 Position = poScreenCenter ShowHint = True OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object StatusBar1: TStatusBar Left = 0 Top = 355 Width = 588 Height = 19 Panels = < item Alignment = taCenter Width = 170 end item Width = 100 end item Width = 250 end> SimplePanel = False end object Panel1: TPanel Left = 0 Top = 0 Width = 588 Height = 355 Align = alClient BevelOuter = bvLowered TabOrder = 1 object Panel3: TPanel Left = 1 Top = 1 Width = 153 Height = 353 Align = alLeft BevelOuter = bvNone Caption = 'Panel3' TabOrder = 0 object Panel5: TPanel Left = 0 Top = 0 Width = 153 Height = 45 Align = alTop TabOrder = 0 object Bevel1: TBevel Left = 3 Top = 3 Width = 146 Height = 38 end object InstallBut1: TSpeedButton Tag = 1 Left = 4 Top = 4 Width = 36 Height = 36 Hint = 'Install CryptoPix' Glyph.Data = { 36080000424D3608000000000000360400002800000020000000200000000100 0800000000000004000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA A600000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000F0FBFF00A4A0A000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00070707070707 0707070707070707070707070707070707070707070707070707070707070707 0707070707070707070707070707070707070707070707070707070707070101 01010101010101010101010101010101010101010101070707070707070701FE FEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFE01070707070707070701FE FEFE0000000000FEFEFEFEFEFEFEFE0000000000FE01FF070707070707000000 FEFE00FE00FEFEFEFEFEFEFEFEFE0007070707070001FF0107070707070701FE FEFE000000FEFEFEFEFEFEFEFE000707070707070700FF0107070707070701FE FEFEFEFEFEFEFEFEFEFEFEFE0007070707070707070700010707070707000000 FEFE0000000000FEFEFEFE0007070707070007070707070007070707070701FE FEFEFEFE00FEFEFEFEFEFE0007070707070007070707070007070707070701FE FEFE0000000000FEFEFEFE000707070700000007070707000707070707000000 FEFEFEFEFEFEFEFEFEFEFE0007070707070707070707070007070707070701FE FEFE0000000000FEFEFEFEFE00070707070707070707000107070707070701FE FEFE00FEFEFE00FEFEFEFEFE0007070707070707070700010707070707000000 FEFE0000000000FEFEFEFEFEFE000000000000000000FF0107070707070701FE FEFEFEFEFEFEFEFEFEFEFEFEFE00FF00FEFEFE00FF00FF0107070707070701FE FEFE00FEFEFEFEFEFEFEFEFEFE00FF00FEFEFE00FF00FF010707070707000000 FEFE0000000000FEFEFEFEFEFE00FF00FE00FE00FF00FF0107070707070701FE FEFE00FEFEFEFEFEFEFE00000000FF0000070000FF00FF0107070707070701FE FEFEFEFEFEFEFEFEFEFE00FBFB0000FF000700FF0000FF010707070707000000 FEFE0000000000FEFEFE00FBFBFB00000007000000FB000107070707070701FE FEFE00FEFEFE00FEFEFE00FBFBFBFBFB000700FBFBFBFB0007070707070701FE FEFE0000000000FEFEFE000000000000000700000000FBFB0707070707000000 FEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFE00FEFEFE00FBFB07070707070701FE FEFE000000FE00FEFEFEFEFEFEFEFEFEFEFEFEFEFE0100FB07070707070701FE FEFE00FE00FE00FEFEFEFEFEFEFEFEFEFEFEFEFEFE01FF000707070707000000 FEFE00FE000000FEFEFEFEFEFEFEFEFEFEFEFEFEFE01FF0107070707070701FE FEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFE01FF010707070707070101 01010101010101010101010101010101010101010101FF010707070707070701 FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF010707070707070707 0101010101010101010101010101010101010101010101010707070707070707 0707070707070707070707070707070707070707070707070707} OnClick = InstallIt end object InstallBut2: TSpeedButton Tag = 2 Left = 40 Top = 4 Width = 36 Height = 36 Hint = 'Install LView Pro' Glyph.Data = { 36080000424D3608000000000000360400002800000020000000200000000100 0800000000000004000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA A600000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000F0FBFF00A4A0A000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00070707070707 0707070707070707070707070707070707070707070707070707070707070707 0707070707070707070707070707070707070707070707070707070707000000 0000000000000000000000000000000000000000000000000007070707000000 0000000000000000000000000000000000000000000000000007070202020202 02020202020202020202020202020202020202020202020200070702FAFAFAFA FAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFA0200070702FAFAFAFA FAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFA0200070702FAFAFAFA FAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFA0200070702FAFAFA02 020202020202020202020202020202020202020202FAFA0200070702FAFAFA02 00070707070707070707070707070707070707070202FA0200070702FAFAFA02 00070707070707070707070707070707070707070702FA0200070702FAFAFA02 00070707000007070707070707070707070707070702020207070702FAFAFA02 00070702FA0007070707070707070707070707070707070707070702FAFAFA02 00070702FA0000000707070700000707070700000007070707070702FAFAFA02 00070702FAFAFAFA00070702FA0007070702FAFAFA00070707070702FAFAFA02 00070702FA000202FA000702FA00070702FA000202FA000707070702FAFAFA02 00070702FA000702FA000702FA00070702FA000702FA000707070702FAFAFA02 00070702FA000702FA000702FA00070702FA000702FA000707070702FAFAFA02 00070702FA000000FA000702FA00000702FA000000FA000707070702FAFAFA02 00070702FAFAFAFA00070702FAFA00070702FAFAFA00070707070702FAFAFA02 00070702020202020707070202020707070702020207070707070702FAFAFA02 00070707070707070707070707070707070707070707070707070702FAFAFA02 00070707070707070707070707070700000000000000000707070702FAFAFA02 00070707070707070707070707070000000000000000000007070702FAFAFA02 000707070707070707070707070202FAFA0202FAFAFAFA0007070702FAFAFA02 0007070707070707070707070702FA0202FA02FA0202020007070702FAFAFA02 0007070707070707070707070702020202FA0202FA02020707070702FAFAFA02 00070707070707070707070707070702FA02020202FA020007070702FAFAFA02 0007070707070707070707070702020202FA02020202FA000707070202020202 0707070707070707070707070702FA0202FA02FA0202FA000707070707070707 070707070707070707070707070202FAFA020202FAFA02000707070707070707 0707070707070707070707070707020202020702020202070707} OnClick = InstallIt end object InstallBut3: TSpeedButton Tag = 3 Left = 76 Top = 4 Width = 36 Height = 36 Hint = 'Install Paint Shop Pro' Glyph.Data = { 36080000424D3608000000000000360400002800000020000000200000000100 0800000000000004000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA A600000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000F0FBFF00A4A0A000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00F8F8F8F8F8F8 F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8070707070707 0707070707070707070707070707070707070707070707070707000000000000 0000000000000000000000000000000000000000000000000000FA000700FE06 0606FEFE070707FE060600070007000606060606060600070000FA000700FEFE 060607FEFE070706FE0600070007000000000000000000070000FA00070006FE FE060707FEFE07FE06FE00070007000606060606060600070000FA0007000606 FEFE070707FEFE06FE0600070007000000000000000000070000FA0007000606 06FE07070707FEFE06FE00070007000606060606060600070000FA000700FE06 06FE0707070707FEFEFE00070007000000000000000000070000FA0007000000 0000000000000000000000070007000606060606060600070000FA0007070707 0707070707070707070707070007000000000000000000070000FA0007000000 0000000000000000000000070007000606060606060600070000FA00070006FE FE00FEFE07070006060000070007000000000000000000070000FA000700FE06 FE00FEFEFEFE00FE060600070007070707070707070707070000FA0007000000 0000000000000000000000070007070707070707070707000000FA0007070707 0707070707070707070707070000000000000000000000000000FA0007F807F8 07F807F807F807F807F807F800FAFAFAFAFA000300FAFAFAFA00FAFA00070707 070707070707070707070700FFFAFAFAFAFA000300FAFAFAFA00FAFAFA000000 0000000000000000000000FFFFFFFAFAFA00FF0300FAFAFAFA00FAFAFA00FC00 FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0300FAFAFAFA00FAFAFA00FE00 000000000000000000000000000000000000000000FAFAFAFA00FAFA00FEFC00 00FE000000FE00FE00FE00FE0000FE0000FE000000FAFAFAFA00FAFA00FCFE00 00FEFE0000FEFEFE00FE00FE00FEFE0000FE000000FAFAFAFA00FA00FCFEFC00 00FE00FE00FE00FE00FE00FEFE00FE0000FE000000FAFAFAFA00FA00FEFCFE00 00FEFE000006FE0600FE00FE0000FE00FEFEFE0000FAFAFAFA00FCFEFCFEFC00 000000000000000000000000000000000000000000FAFAFAFA00FEFCFEFCFEFC FEFCFEFCFEFCFEFCFEFCFEFCFEFCFEFCFEFCFEFAFAFAFAFAFA00FCFEFCFEFCFE FCFEFCFEFCFEFCFEFCFEFCFEFCFEFCFEFCFEFCFAFAFAFAFAFA00FEFCFEFCFEFC FEFCFEFCFEFCFEFCFEFCFEFCFEFCFEFCFEFCFEFAFAFAFAFAFA00FCFEFCFEFCFE FCFEFCFEFCFEFCFEFCFEFCFEFCFEFCFEFCFEFCFEFAFAFAFA00FEFEFCFEFCFEFC FEFCFEFCFEFCFEFCFEFCFEFCFEFCFEFCFEFCFEFCFEFAFA00FEFCFCFEFCFEFCFE FCFEFCFEFCFEFCFEFCFEFCFEFCFEFCFEFCFEFCFEFCFEFCFEFCFE} OnClick = InstallIt end object InstallBut4: TSpeedButton Tag = 4 Left = 112 Top = 4 Width = 36 Height = 36 Hint = 'Install Smart Draw' Glyph.Data = { 36080000424D3608000000000000360400002800000020000000200000000100 0800000000000004000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA A600000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000F0FBFF00A4A0A000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00070707070707 0707000000070707070707070707070707070707070707070707070707070707 0700FBFFFB000007070707070707070707070707070707070707070707070707 0700FFFBFFFBFF00000707070707070707070707070707070707070707070707 00FFFBFFFBFFFBFFFB0000070707070707070707070707070707070707070707 00FBFFFBFFFBFFFBFFFBFF000007070707070707070707070707070707070700 FBFFFBFFFBFF0000FBFFFBFFFB00000707070707070707070707070707070700 FFFBFFFBFF00FCFC00FBFFFBFFFBFF00000707070707070707070707070700FF FBFFFBFFFB00FCFC00FFFBFFFBFFFBFFFB0000070707070707070707070700FB FFFBFFFB00FCFCFCFC000000FFFBFFFBFFFBFF0000070707070707070700FBFF FBFFFBFF00FCFCFCFCFCFCFC00FFFBFFFBFFFBFFFB000007070707070700FFFB FFFBFFFBFF0000FCFCFCFC00FFFBFFFBFFFBFFFBFFFBFF000007070700FFFBFF FBFFFBFFFBFFFB0000FCFC000000FBFF0000FBFFFBFFFBFFFB00070700FBFFFB FFFBFFFBFFFBFFFBFF0000FBFFFB0000F9F90000FFFBFFFBFF000700FBFFFBFF 0000FBFFFBFFFBFFFBFFFBFFFBFFFB00F9F9F9F900FFFBFF00070700FFFBFFFB 00F90000FFFBFFFBFFFBFFFBFFFB00F9F9F9F9F9F900FFFB000700FF0000FBFF 00F9F9F90000FBFFFBFFFBFFFBFFFB00F9F9F9F900FFFB00070700FF000000FB 0000F9F9F900FFFBFFFBFFFBFFFBFFFB0000F9F900FBFF000707070000000000 FBFF0000F9000000FBFFFBFFFBFFFBFF00FF0000FBFF00070707070700FFFF00 FFFBFFFB0000FFFB0000FFFBFFFBFFFB00FBFFFBFFFB00070707070700FFFFFF 00FFFBFFFBFFFBFFFBFF000000000000FBFFFBFFFB000707070707070700FFFF 000000FBFFFBFFFBFFFBFF00FCFCFC00FFFBFFFBFF000707070707070700FFFF FF00070000FFFBFFFBFFFB00FCFCFC00FBFFFBFF0007070707070707070700FF FF000707070000FBFFFBFF00FCFCFC00FFFBFFFB0007070707070707070700FF FFFF00070707070000FFFB0000000000FBFFFB00070707070707070707070700 FFFF000707070707070000FBFFFBFFFBFFFBFF00070707070707070707070700 FFFFFF00070707070707070000FFFBFFFBFF0007070707070707070707070707 00FF00000707070707070707070000FBFFFB0007070707070707070707070707 0000000700070707070707070707070000000707070707070707070707070707 0700070700070707070707070707070707070707070707070707070707070707 0707000007070707070707070707070707070707070707070707070707070707 0707070707070707070707070707070707070707070707070707070707070707 0707070707070707070707070707070707070707070707070707} OnClick = InstallIt end end object Panel2: TPanel Left = 0 Top = 45 Width = 153 Height = 308 Align = alClient Caption = 'Panel2' TabOrder = 1 object Files: TFileListBox Left = 1 Top = 172 Width = 151 Height = 101 Align = alClient ExtendedSelect = False ItemHeight = 16 Mask = '*.bmp' TabOrder = 0 OnClick = FilesClick end object Panel6: TPanel Left = 1 Top = 273 Width = 151 Height = 34 Align = alBottom BevelOuter = bvNone Caption = 'Panel6' TabOrder = 1 object Filter: TFilterComboBox Left = 7 Top = 6 Width = 136 Height = 21 FileList = Files Filter = 'Graphic Files (*.bmp)|*.bmp|All files (*.*)|*.*' TabOrder = 0 end end object Panel4: TPanel Left = 1 Top = 1 Width = 151 Height = 171 Align = alTop BevelOuter = bvNone Caption = 'Panel4' TabOrder = 2 object Label1: TLabel Left = 38 Top = 2 Width = 75 Height = 13 Caption = 'Directory Listing' end object Directory: TDirectoryListBox Left = 1 Top = 16 Width = 147 Height = 121 FileList = Files ItemHeight = 16 TabOrder = 0 end object Drive: TDriveComboBox Left = 7 Top = 144 Width = 136 Height = 19 DirList = Directory TabOrder = 1 end end end end object Panel7: TPanel Left = 154 Top = 1 Width = 433 Height = 353 Align = alClient BevelOuter = bvNone Caption = 'Panel7' TabOrder = 1 object ImageScroll: TScrollBox Left = 0 Top = 0 Width = 433 Height = 317 HorzScrollBar.Tracking = True VertScrollBar.Tracking = True Align = alClient BorderStyle = bsNone TabOrder = 0 object Image: TImage Left = 0 Top = 0 Width = 10 Height = 10 Stretch = True end end object Panel10: TPanel Left = 0 Top = 317 Width = 433 Height = 36 Align = alBottom BevelInner = bvRaised BevelOuter = bvNone TabOrder = 1 object Factor: TPanel Left = 4 Top = 6 Width = 38 Height = 25 BevelOuter = bvLowered TabOrder = 0 end object Zoomer: TUpDown Left = 42 Top = 6 Width = 16 Height = 25 Enabled = False Min = 1 Max = 5 Position = 3 TabOrder = 1 Wrap = False OnClick = ZoomerClick end end end end object Timer1: TTimer Interval = 2000 OnTimer = Timer1Timer Left = 554 Top = 345 end object MainMenu1: TMainMenu Left = 522 Top = 345 object File1: TMenuItem Caption = '&File' ShortCut = 0 object Exit1: TMenuItem Caption = 'E&xit' ShortCut = 0 OnClick = Exit1Click end end object Install1: TMenuItem Caption = '&Install' ShortCut = 0 object CryptoPix1: TMenuItem Tag = 1 Caption = '&CryptoPix' ShortCut = 0 OnClick = InstallIt end object LView1: TMenuItem Tag = 2 Caption = '&LView Pro' ShortCut = 0 OnClick = InstallIt end object PaintShopPro1: TMenuItem Tag = 3 Caption = '&Paint Shop Pro' ShortCut = 0 OnClick = InstallIt end object SmartDraw1: TMenuItem Tag = 4 Caption = '&Smart Draw' ShortCut = 0 OnClick = InstallIt end end object Help1: TMenuItem Caption = '&Help' ShortCut = 0 object About1: TMenuItem Caption = '&About' ShortCut = 0 OnClick = About1Click end end end end